'Perfect Bot for evolution
'FirstBot is the official name

'/*****proper reproduction 1

cond
  *.nrg
  20000
  >
start
  50
  .repro
  store
  'if time to reproduce store it
  1
  972
  store
stop

cond
  '/after robot reproduces it reproduces more until energy less then 3000
  *972
  1
  =
start
  50
  .repro
  store
stop

'***** 2

cond
  *.nrg
  3000
  <
start
  0
  972
  store
stop

'\*****very simple find food method 3

cond
start
 -1
  .shoot
  store
  10
  .up
  store
stop
end